@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} HE |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8} 3E:}DISK OPERATING SYSTEM II VERSION 2.0SCOPYRIGHT 1980 ATARIA. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDGE J. D,}UPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRESSF. LOCK F-}ILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES9!&x#!7&p))'&X*./)L''-؆莟.}R'S  vW DEHHI 1A#! @ ~0ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU! 0 .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # 0 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED COPYING---DN:4}# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}//3Hu ξL/L DRIVE TO WRITE DOS FILES TO?WRITING NEW DOS FILESTYPE "Y" TO WRITE DOS TO DRIVE 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DUA}P DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `)  <0 2 2 0  ,   ,,ޢ* 1L ,K* 1 ~0 0C}FINSERT BOTH DISKS, TYPE RETURNERROR - DRIVES INCOMPATIBLE., 1 ~038  , 1L D}, &*  Lz+, 0 , 1 ~0 + Y,0!,0 ,L+ ,mm  v,"ǭE}0Ξ, 05,Lt+L +,Hh` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNF}INSERT DESTINATION DISK,TYPE RETURN`    `L,8,0( rG}L1(`ߢ) 1* 1 ~0Y`hhL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A., 1 <0 0 .@L# .BJ 1  DEHIB V L1 ,5 1 <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 , 1 <0,0Lf- B VJ},A#P, 1 <0 0L#L ߢ) 1* 1 ~0Yj383}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `DESTINATION CANT L}BE DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1HIHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 128ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4uT} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4u$S(88(888(888(88(888(8f~~f$~~$B~~Bf~w~f$~w~$B~w~B$$<<$<$<<<$<$<<V}$$$<<$$<<<$<$$<<$<DDc[[c"[["A[[cf$000 00000W}0000 0 00 03?3?3UT X}*)%)*PThXh???kjjjjj *00T3 <<00??<$Y}       (%           (&    H& "\&Z}  j&|& x[} S0S \}L'r'r'L' mr'&e&ir'&ir'L'`L'q'o'o'L%(8q'q'q'&]}p' p'L(8q'& q'&8q'8q'&i&o'L'`L*(&(&(Lc(8&(&(r'&(V(V(r'Lc(& 'r'LK(^} '`Lk(g(&mg(& ' '`L((&m(& ' '`L((((T'(U'U' m*'*(m+'T'qq&e&e_}]'`L((((V'(W'T'MV'L*V'T'L%)V'_'T'`'L1)T'_'V'`']'IFL)W' m*'*(m+'_'qq`}&e&eCW' m*'*(m+'`'qq&e&eD_'8`'`'_'^'`'))^'L*W' m*'a}*(m+'^'qq&e&e]'^'L)U'MW'L$-W'U'L4*W'_'U'`'L@*U'_'W'`']'IIL,_' m*'b}*(m+'T'qq&e&eH`' m*'*(m+'T'qq&e&eGV'i_' m*'*(m+'c}qq&e&ee'8V'_' m*'*(m+'qq&e&eg'e'IFLy+_' m*'*(d}m+'V'qq&e&eQg'IFL+_' m*'*(m+'V'qq&e&ePV'i`' m*'e}*(m+'qq&e&ef'8V'`' m*'*(m+'qq&e&eg'f'IFL},`' f}m*'*(m+'V'qq&e&eNg'IFL,`' m*'*(m+'V'qq&e&eO_'8`'g}`'_'^'`',,^'L$-^' m*'*(m+'V'qq&e&e]'^'L,V'T'W'U'`L:- 1-2-h}&1-&5-&n'4-E'3-D'n'&d':'1-;'2-L-81-8'2-9'8 栍c'L-c'`L- -c'i}L-&mc'&i-L_.c'IL_.&mc'&i-ic'i&e&i-ic'i&e&i-j}ic'i&e&i--&md'D'e&E'i&\'b'..\'L.8-b'm\'&e&ik}-im\'&e&i\'L.\'\'L%/-m\'&e&i&m\'&i\'L.`L*/&/&/&&/&l}&/&&/&&/&&/&8&/&0&/&8&/& &/&&/&)&/&&/&)&/&&/& &/&&/& m}&/&`L/4͸&L3&L3& m*'*(m+'&qq&e&ej'&i& m*'*(m+'qn}q&e&ek'j'IL0& m*'*(m+'&qq&e&e&i& m*'*(m+'o}qq&e&eH'I' s' '(Vm'j'EL1Q' Q'L1h&mQ'i&i/Q'ih&ei&p}i//M&Lv1/M&Lv1b]'&& (&i& (Q'iQ'L0Q'/'Ji (K'dJ'804&IL>804&04&04 '04&ILl804&ILl804&04&04 '04&IL804'I}L804&04&04 '04&L804&L8804&b'04&04&IL804&L804&mb'04&04&IL904&}L9804&b'04&04&IL8904'L8904&mb'04&`LB999<999&;999&=999&>999 '/99&L(;99}&L(;J' K'L9&99ݴ&L9&i899&ŮL999&LW:99&͸&L98&099ݴ&L999&LW:&99ݹ&L:}&i899&ŮL:99&LW:99&ͽ&LD:8&099ݹ&LD:99&LW: 񦥠:9:999&;9Lt:99&ILt:<9L:};9IL:99&L:<9L:;9IL:99&IL:<9L:;9IL:99&IL:<9L:<9<9IL: 񦥠:9:999&}<9LW:99&M>9L(;99&M=9L(; 񦥠:9:999&99 34`L3;/; '/&&IL;M&L;&&)i'i'}Lx;&&&)i'i'L;&&L;&&)i'i'L;&&&)i'i'L;& 34l'I}L;/;IL; /`L<w';;LI<&m;&iѮLC<&m;&iw';L <`LR< T0 g&&} wLv< 2'i3'im6'}m7'%m6'%m7' w6'Ю7'L=X g&&`L%>>/oРQ'Q'L_>&mQ'&iQ'}L9>P'iP'i 8'9'8'i:'9'i;':'i<';'i='<'i>'='i?'>'i@'?'iA'@'iB'A'i}C'.'/'='<' m.'*(m/'?'ȑ>' m.'*(m/'A'ȑ@' m.'*(m/'C'ȑB'&}& i &i&i i&i&i i&i}&i i9'8' `L @! L @PAUSED@ Q'Q'LR@&mQ'&iQ'L},@LW@! Ly@ @r `L@Q'Q'LAR'R'LAR' m*'*(m+'Q'qq&e}&e@@IN @IPL@@LA@IO @IQLA8@@@ICLA@L1A@IDL1A8@@@ISLAA@LTA@ITLT}A8@@8'Q'R' m*'*(m+'qq&e&e@R'L@Q'L@`LAF]'Q'&mQ'&iX'X'}(LYBQ'i&e&iY'Q'i&e&iZ'Q'i&e&i['Y'X' (['Z' (Q'iQ'&m}Q'&iX'LAI]'Q'F&mQ'G&iX'X'(L CQ'iF&eG&iY'Q'iF&eG&iZ'Q'i}F&eG&i['Y'X' (['Z' (Q'iQ'F&mQ'G&iX'LxBE]' (b]'Q'Q'LSCQ' ( Q' (}Q' (Q' (Q'L#C (  ( (  ( ( ( (U]'Q'Q'LCZ&mQ'[&iX'Q'iZ&}e[&iY'Y'X' (Q'iQ'LCT]'Q'Q'LVDZ&mQ'[&iX'Q'iZ&e[&iY'S]'Y'X' (T}]'X'iY' (Q'iQ'LC @Q' Q'LD 񦥠S'&i&iS' i7'6'6' 7'LD}6'7'LDQ'L^DQ' Q'L>Eh&mQ'i&iX'Q'ih&ei&iY'Vm']'Y'X' (Wm']'X'iY' (}Q'iQ'LDQ'Q'LEz&mQ'{&iX'Q'iz&e{&iY'`]'Y'X' (a]'X'iY' (Q'iQ'LCE}7'(6'6'7'L_F&m6'&m7'e'6'i7'i&e&ef'e'LTFf'LTF&m6'&m7'}6'i7'i&e&e‘F'G'6'7'LE`LcF {'|'z'w''Q'Q'LF&mQ'&iQ'L{FM'}L''j T Φ Φ Φ0 g&&&i &i&i &i wX g&& '} L8GӠG2  LRGŠGM  LvG pressŠorGg sLG Ԡto٠G ̤LG} by Ken MillerG  !Q'Q'LGw'e' ԭe'e' ILGQ'LG8w'w'ILGw'e'&} ' Y= ">`L7H !G'F'I'H'Q'Q'LkH|Q'&`Q'&Q'LKH|&&&&& AQ'8{'HH}Q'LHmQ'&e&iRQ'LH;':'  Φ  Φ Φ Φ Φ&b'Q'Q'}LLIQ''Q''Q''Q''Q'!'Q'LILYI @|'ͭ&LI&|'{'8{'e&e&iR&L}I|'s'LI&&s'&i&i!8s's'LI&i&iu'L/J&i&i mu'&}i&i‘8u'u'LDJ&i&iv'LJ&i&i mv'&i&ib8v'v'LJ&i&}iF'MH' G'MI'LK8L'L'M'M'L' M'L'M'LJM' L''i'́'LJ''͂'LK'} 4HH'IK I'ILDKc]'  (d]'  (O'^N'N'O'LdK8N'N'O'O'N'I O'ILKb]'  (  ( ;}x'LK}'w'LbNw'ILKw'LKNw'&LK'LK'w'&LKw''LKw''J'K' x'L[Lw'}'LXLPw''w''IPLIL~'}':L:L~'LFL (~'L/L}'}'LXL}'LbN'w']'LbNw''LbN;':' }m'Q'Q'LL|Q'&`Q'&Q'LL !7'6'6'7'LM'%'JJJ'L M'%'i%'%'LL%' ' 'L} M 'e$ 'd$;':' 7-&&m' -&i&i ' &i&iQ'Q'LwMQ'LgM6'7'}LL&i&i&i&i'%';':' &|&&w'e$&d$;':' 7-&&}m' -7'6'@6'7'L'N6'7'L N8{'e&e&i8{'{'{'LbN `F 4Hw'J'K'LN8J}'J'K'K'Q'Q'LN&mQ'&i iQ'LNLOx'LO8x'x'8y'y'Q'Q'L&O}&mQ'&i iQ'LNy'LOy'&& i &i&i} i&i&i i&i&i iQ'Q'L^R}Q''LWPQ' ?9Q' m.'*(m/'$Q'&$ 7-Q'&Q'&m' -LXR8Q''Q''Q''}Q''LXRQ'!'Q''LaQQ''Q'!'Q'!'LPQ'!'Q''Q''LPQ''&Q'}'&i'Q' m.}'*(m/'ȱ$'$ 7-Q'&Q'&m' -&i&iQ''&i&iLXRQ'}'LXRQ''LXR&i&i&i&iQ''Q'!'Q' m.'*(m/'ȱ Q'}&|Q'&`Q'&Q' ?9Q' m.'*(m/'$Q'&$ 7-Q'&Q'&m' -Q''Q'LO }0;e$&d$;':' 7-&&m' -m'm'LRm'7'6'L'RM'RR6'R7'LR6'7'LRILL}I `FL7H`LR& j' `F 4H``R+ ; CHECKSUM DATA;[EC 61 1B 36 B8 1C C8 1E; 4C 34 CD 5E 3C 82 2A 56; DF 77 62 ED 61 C7 5A 14; 20 C1 6C 4F E9 2C } D1 EB; 6C 95 E1 84 AF 0B 1A 88; 3B EE ] PROC STICK(BYTE PN) VARSET(4) IF ST(0)<>15 THEN ATRACT=0 IF SAX(4)=0 T }HEN STIK=ST(0) & 1 IF STIK = 0 THEN DIR(4)=0 FI STIK=ST(0) & 2 IF STIK=0 THEN DIR(4)=1 FI FI IF } SAY(4)=0 THEN STIK=ST(0) & 8 IF STIK=0 THEN DIR(4)=3 FI STIK=ST(0) & 4 IF STIK=0 THEN DIR(4)=2 FI } FI FI CHCH(4) IF DDM=1 AND PN=4 THEN LOOK() FIRETURNPROC CHCOL() BYTE COP COL=0 FOR COP=0 TO 3 DO IF MPL(COP })>0 THEN COL=MPL(COP) FI OD HITCLR=0RETURN PROC GR4() GRAPHICS(0) DLIST=PEEKC(560) POKE(752,1) PRINT(" ") DLIST(3)=66 } FOR LP0=6 TO 28 DO DLIST(LP0)=4 OD FOR LP0=0 TO 40 DO Y40(LP0)=LP0*40 OD FOR LP0=0 TO 12 DO T8M(LP0)=LP0*8 OD F }OR LP0=0 TO 4 DO T3M(LP0)=LP0*3 ODRETURNPROC CHSETUP() POKE (106,96) P106=PEEK(106)-4 CHSET=P106*256 RAMTOP=P106 GR4 }() CHBAS=P106 MOVEBLOCK(CHSET,57344,1024) FOR CLP0=0 TO 288-1 DO POKE((CHSET+520)+CLP0,CHST(CLP0)) OD SCR=PEEKC(88)RET }URNPROC PM_SET() SDMCTL=62 GRPRIOR=1+16 GRACTL=3 FOR LP0=0 TO 3 DO SIZEP(LP0)=0 OD PMBASE=P106+4 PMTEMP=(P106+4)*256 } M0=PMTEMP+768 PL0=M0+256 PL1=PL0+256 PL2=PL1+256 PL3=PL2+256 PAD(0)=PL0 PAD(1)=PL1 PAD(2)=PL2 PAD(3)=PL3 PCOLR(0)=0*16+ }10 PCOLR(1)=12*16+5 PCOLR(2)=8*16+4 PCOLR(3)=4*16+4 ZERO(PMTEMP,2048)RETURNPROC PAUSE() POSITION(33,0) PRINT("PAUSED") } FOR LP0=0 TO 7 DO AUDFC(LP0)=0 OD CH=255 DO UNTIL CH<255 OD CH=255 POSITION(33,0) PRINT(" ")RETURNPROC MIRR }OR() BYTE SC FOR LP0=0 TO 19 DO FOR LP1=0 TO 23 DO SC=SCR(LP0+Y40(LP1)) IF SC=78 OR SC=80 THEN SC==+1 ELSEIF }SC=79 OR SC=81 THEN SC==-1 FI IF SC=67 THEN SC==+1 ELSEIF SC=68 THEN SC==-1 FI IF SC=83 THEN SC==+1 ELSEIF }SC=84 THEN SC==-1 FI SCR((39-LP0)+Y40(LP1))=SC OD ODRETURNPROC BOARDS() IC=70 LP0=0 P0X=PRL(LP0) WHILE P0X<40 D }O P0Y=PRL(LP0+1) P1X=PRL(LP0+2) P1Y=PRL(LP0+3) PL(P0X,P0Y) DR(P1X,P1Y) LP0==+4 P0X=PRL(LP0) OD IC=73 LP0=0 P0X=PUD( }LP0) WHILE P0X<40 DO P0Y=PUD(LP0+1) P1X=PUD(LP0+2) P1Y=PUD(LP0+3) PL(P0X,P0Y) DR(P1X,P1Y) LP0==+4 P0X=PUD(LP0) OD } IC=69 PL(12,9) IC=98 FOR LP0=0 TO 2 DO PL(LP0,1) DR(LP0,10) PL(LP0,14) DR(LP0,23) OD PL(0,12) DR(2,12) PL(19,8 }) DR(19,10) PL(10,8) PL(10,10) PL(12,14) IC=85 FOR LP0=0 TO 4 STEP 2 DO P0X=DOOR(LP0) P0Y=DOOR(LP0+1) PL(P0X,P0Y) } OD IC=84 FOR LP0=4 TO 15 STEP 2 DO P0X=DOOR(LP0) P0Y=DOOR(LP0+1) IC=83 PL(P0X,P0Y) IC=84 PL(P0X+1,P0Y) OD MI }RROR() FOR LP0=0 TO 10 DO R=RAND(15) PCOLR(6)=R*16+8 FOR CLP0=0 TO 3500 DO OD OD FOR LP0=0 TO 11 STEP 2 DO P0X=ENE }R(LP0) P0Y=ENER(LP0+1) IC=86+INE PL(P0X,P0Y) IC=87+INE PL(P0X+1,P0Y) OD FOR LP0=0 TO 15 STEP 2 DO P0X=KEYS(LP0) P0Y=K }EYS(LP0+1) IC=96 PL(P0X,P0Y) IC=97 PL(P0X+1,P0Y) OD FOR CLP0=40 TO 959 DO TS0=SCR(CLP0) TS1=SCR(CLP0+1) IF TS0=0 AN }D TS1=0 THEN SCR(CLP0)=193 SCR(CLP0+1)=194 GC==+1 FI ODRETURNPROC TITLE() XTRA=10 OSCOR=0 SSC=5 COL=0 INE=0 FOR } LP0=0 TO 7 DO HPOSP(LP0)=0 OD DELAY=700 RAMTOP=MEM GRAPHICS(1) SETCOLOR(4,0,0) SETCOLOR(0,8,3) SETCOLOR(1,2,8) DLIS }T=PEEK(560) DLIST(10)=7 DLIST(11)=7 POKE(752,1) SCR=PEEKC(88) PRSCOR() POSITION(5,5) PRINTD (6,"") POSITION(9,6) P }RINTD(6,"") POSITION(2,14) PRINTDE(6," pressŠor") PRINTD(6," Ԡto") PUTE() PRINT(" by Ken Mi }ller") SNDRST() DO FOR LP0=0 TO 1 DO TS0=COL DO WSYNC=0 PFCOLR2=TS0 TS0==+1 UNTIL VCOUNT=128 OD OD COL== }-1 UNTIL CONSOL=6 OR STRIG0=0 OD COL=0 TS0=0 ZERO(SCOR,8) PRSCOR() CHSETUP() PM_SET() HITCLR=0RETURNPROC START()BYTE } RDO SNDRST() GC=0 GG=0 FOR LP0=0 TO 3 DO STX(LP0)=124 STY(LP0)=96 OD STX(4)=124 STY(4)=160 BRPO(1)=0 ZERO(SCR,959) }BOARDS() FOR LP0=0 TO XTRA-1 DO SCR(21+LP0)=82 OD ZERO(M0,1279) SETCOLOR(0,0,14) SETCOLOR(1,8,10) SETCOLOR(2,3,5) SETC }OLOR(3,2,8) SETCOLOR(4,0,0) DIR(4)=2 SP=2 FOR LP0=0 TO 4 DO SPIN(LP0)=0 EDF(LP0)=0 PDF(LP0)=0 SPT(LP0)=0 SPN(LP0)=0 O }D DO IF CH<255 THEN PAUSE() FI IF SCOR(3)>OSCOR THEN OSCOR=SCOR(3) XTRA==+1 SCR(21+(XTRA-1))=82 FI IF SCOR(3)= }0 THEN OSCOR=0 FI IF ST0>0 THEN AUDFC(0)=ST0 AUDFC(1)=32+1 ST0==-1 ELSE AUDFC(1)=0 FI IF ST2>0 THEN AUDFC(2) }=10+ST2 AUDFC(3)=128+64+2 ST2==-1 ELSE AUDFC(3)=0 FI IF ST3>0 THEN AUDFC(4)=12+ST3 AUDFC(5)=64+32+2 ST3==-1 } ELSE AUDFC(5)=0 FI IF GC=GG THEN DELAY==-25 IF DELAY<10 OR DELAY>700 THEN DELAY=10 FI INE==+2 IF INE>8 }THEN INE=0 FI THO==+1 IF THO>5 THEN THO=1 FI START() FI IF GG=75 THEN IC=99 PL(19,10) IC=100 PL(20,10) }MBT=350 FI IF MBT>0 THEN MBT==-1 FI IF MBT=1 THEN IC=98 PL(19,10) PL(20,10) FI CHCOL() IF PT=0 THEN ESC=2 F }I IF COL>0 THEN IF COL=8 THEN COL=3 ELSE COL== RSH 1 FI IF DIR(4)>1 THEN PDF(4)=1 ELSE PDF(4)=0 FI } IF DIR(COL)>1 THEN PDF(COL)=1 ELSE PDF(COL)=0 FI IF POWER>0 OR PT>0 THEN IF EDF(COL)=0 THEN EDF(COL)=80 } IF EDF(COL)=80 THEN FOR ELP=1 TO ESC DO HUND(1) OD ESC==+1 FI IF ESC>16 THEN ESC=8 FI } FI ELSEIF PDF(4)=PDF(COL) AND EDF(COL)=0 THEN ZERO(M0,1279) PMM=0 FOR LP0=0 TO 3 DO STX(LP0)=124 STY(LP0 })=96 OD SNDRST() FOR CLP0=0 TO 500 DO SPT(4)==+1 IF SPT(4)>SPN(4) RSH 3 THEN SPT(4)=0 SPN(4)==+6 } IF SPN(4)>250 THEN SPN(4)=0 FI SPIN(4)==+1 IF SPIN(4)>3 THEN SPIN(4)=0 FI FI PMST(M0,P0,SPIN(4)) } PM_GO(STX(4),STY(4),PMM) AUDFC(6)=SPIN(4) LSH 4 AUDFC(7)=2 FOR LP0=0 TO 200 DO OD OD AUDFC(6)=0 A }UDFC(7)=0 SPT(4)=0 SPN(4)=0 ZERO(M0,255) DIR(4)=2 STX(4)=124 STY(4)=160 COL=0 PMST(M0,P0,DIR(4)) PM_GO(STX(4) },STY(4),PMM) FOR CLP0=0 TO 40000 DO OD SCR(21+(XTRA-1))=0 XTRA==-1 IF XTRA=0 THEN TITLE() START() FI FI }FI COL=0 IF POWER>0 THEN POWER==-1 FOR LP0=0 TO 3 DO PCOLR(LP0)=2*16+6 OD ELSEIF PT>0 THEN PT==-1 PD==-1 } FOR LP0=0 TO 3 DO PCOLR(LP0)=2*16+6 OD IF PD>200 THEN PD=5 PCOLR(0)=0*16+10 PCOLR(1)=12*16+5 PCO }LR(2)=8*16+4 PCOLR(3)=4*16+4 FI FI FOR LP0=0 TO 3 DO IF EDF(LP0)=0 THEN EMBR(LP0) PMST(PAD(LP0),EP,DI }R(LP0)) PM_GO(STX(LP0),STY(LP0),PMM) ELSE EDF(LP0)==-1 SPT(LP0)==+1 IF EDF(LP0)>2 THEN IF SPT(LP0)> }SPN(LP0) THEN SPT(LP0)=0 SPN(LP0)==+1 IF SPN(LP0)>15 THEN SPN(LP0)=0 FI SPIN(LP0)==+1 } IF SPIN(LP0)>3 THEN SPIN(LP0)=0 FI SES=SPNA(SPIN(LP0)) PMST(PAD(LP0),EP,SES) PM_GO( }STX(LP0),STY(LP0),PMM) AUDFC(4)=SPIN(LP0) AUDFC(5)=4 ELSEIF EDF(LP0)>2 AND EDF(LP0)<5 THEN AUDF }C(6)=0 AUDFC(7)=0 SPT(LP0)=0 SPN(LP0)=0 ZERO(PAD(LP0),255) DIR(LP0)=1 STX(LP0)=124 STY(LP0)=96 } EMBR(LP0) PMST(PAD(LP0),EP,DIR(LP0)) PM_GO(STX(LP0),STY(LP0),PMM) EDF(LP0)=0 FI FI } FI OD STICK(4) PMST(M0,P0,DIR(4)) PM_GO(STX(4),STY(4),PMM) PMM==+1 IF PMM>2 THEN PMM=0 FI FOR C }LP0=0 TO DELAY DO OD UNTIL CONSOL=6 OD TITLE() OD RETURN PROC MAIN() ZERO(SCOR,8) MEM=RAMTOP TITLE() START() } RETURN ;THE END?  ;ӠŮ MODULE; CHECKSUM DATA;[61 4F 6D B9 C9 38 9B 37; 98 6A D4 94 37 3C E1 CC; 66 F4 71 86 25 4D C2 D}A; C8 DD 8E 0C F2 7E 60 C4; B0 C6 A0 DB EB 75 E1 2E; CD BA 0D 76 60 2A 9B CE; AC ]BYTE ARRAY P0=[ 16 186 186 40 56 186} 186 0 16 56 186 40 56 186 56 0 16 186 56 40 56 56 186 0 0 186 186 56 40 186 186 16 0 56 186 56 40 186 56 16 0 186 56 56} 40 56 186 16 102 0 126 238 126 0 102 0 36 0 126 238 126 0 36 0 66 0 126 238 126 0 66 0 102 0 126 119 126 0 102 0 36 0 1}26 119 126 0 36 0 66 0 126 119 126 0 66 0 ], EP=[ 189 189 36 60 60 165 189 36 60 189 36 60 60 165 60 36 189 60 36 60} 60 36 189 36 36 189 165 60 60 36 189 189 36 60 165 60 60 36 189 60 36 189 36 60 60 36 60 189 198 0 255 218 218 255 0} 130 68 0 255 218 218 255 0 68 130 0 255 218 218 255 0 130 99 0 255 91 91 255 0 99 34 0 255 91 91 255 0 34 65 0 255} 91 91 255 0 99], CHST=[ 0 0 3 15 15 3 0 0 0 0 0 192 192 0 0 0 15 48 192 192 192 48 15 0 192 48 12 12 12 48 192 0 } 48 48 204 204 204 48 48 0 255 0 0 0 0 0 255 0 204 204 204 204 204 48 48 0 48 48 204 204 204 204 204 204 204 204 204 }204 204 204 204 204 192 192 192 192 192 192 192 192 12 12 12 12 12 12 12 12 0 0 0 0 0 0 255 0 255 0 0 0 0 0 0 0 192} 192 192 192 192 48 15 0 12 12 12 12 12 48 192 0 192 48 12 12 12 12 12 12 15 48 192 192 192 192 192 192 0 51 0 63 51} 63 0 51 0 0 0 85 0 0 0 0 0 0 0 84 0 0 0 0 16 16 16 16 16 16 16 0 3 12 8 15 15 15 15 15 192 240 240 240 240 240 240} 240 0 5 21 42 41 37 41 42 0 80 84 168 104 88 104 168 0 0 63 63 63 0 0 0 0 0 240 245 240 0 0 0 0 107 106 106 106 10}6 106 0 0 253 253 253 189 189 173 0 10 42 1 1 1 1 1 1 128 144 0 0 0 0 0 0 0 48 204 205 204 48 0 0 0 0 0 84 16 0 0 0} 0 0 0 0 0 0 0 0 51 15 12 60 252 255 60 15 48 252 48 252 63 63 60 240], PRL=[ 3 1 18 1 3 23 18 23 0 11 3 11 0 } 13 3 13 9 4 18 4 9 11 15 11 12 7 15 7 18 7 21 7 9 13 15 13 12 15 15 15 40], PUD=[ 3 1 3 11 3 13 3 23 6 3 6 11 6 13} 6 21 9 6 9 11 15 7 15 11 18 7 18 11 9 13 9 21 12 15 12 21 18 13 18 15 18 17 18 21 15 17 15 21 40], DOOR=[ 3 12 15 14} 10 7 19 1 10 21 16 17 16 21 19 23 19 11], ENER=[ 10 14 16 19 4 7 28 14 22 19 34 7], KEYS=[7 4 19 4 31 4 16 9 22 9 7} 17 31 17 19 14], SPNA=[0 3 1 2],SCR,DLIST,T8M(12), T3M(6),ST=632,PCOLR=704,HPOSP=53248, HPOSM=53252,SIZEP=53256,MPL=53256}, AUDFC=53760,PARY,SH,SCOR(8),SC, STX(5),STY(5),ODR(5),OSX(5),OSY(5), CSX(5),CSY(5),CDX(5),CDY(5),SAX(5), SAY(5),BRPO(5),}DIR(5),DDU(5),DDD(5), DDL(5),DDR(5),EH(5),EDF(4),PDF(5), SPT(5),SPIN(5),SPN(5),ECT(4)CARD ARRAY Y40(24),PAD(5)CARD CHSET,}DL,CLP0,PMTEMP,M0,PL0,PL1,PL2,PL3,SHAD,GC,GG,POWER=[0],DELAY,MBTBYTE P106,LP0,LP1,R,PLX,PLY,DRX,DRY,P0X,P0Y,P1X,P1Y,TALL,}IC,S,S0,S1,PMTL,SP=[2],PMNO,DI,TS0,TS1,TS2,TS3,STIK,DCD,DCD0BYTE DDM,PMM,TM,SP1,PO,LB,SP0,ST0,ST1, ST2,ST3,COL=[0],PT=[0 }],PD=[0],SSC, XTRA=[3],OSCOR=[0],ESC=[2],ELP,SES, MEM,INE=[0],THO=[1]BYTE RTCLOK=18,ATRACT=77,RAMTOP=106, SDMCTL=559,GRP }RIOR=623,STRIG0=644, CHBAS=756,CH=764,PFCOLR2=53272, P0C=53260,GRACTL=53277,HITCLR=53278, CONSOL=53279,AUDCTL=53768, PMBA }SE=54279,WSYNC=54282, VCOUNT=54283 PROC PRSCOR() FOR SP0=0 TO 7 DO SCR(10+SP0)=SCOR(SP0)+16 OD RETUR }NPROC SCLP() LB=8 FOR SP1=0 TO 7 DO LB==-1 PO=SCOR(LB) IF PO>9 THEN SCOR(LB)=SCOR(LB)-10 SCOR(LB-1)=SCOR(LB-1)+ }1 FI ODRETURNPROC SCORE(BYTE ADD) IF ADD>0 THEN ADD==-1 FOR SP0=0 TO ADD DO SCOR(7)=SCOR(7)+1 SCLP() ;up dat}e score. OD FI PRSCOR() ;Print it.RETURNPROC THOUS(BYTE TH) SCOR(4)==+TH SCLP() PRSCOR()RETURNPROC HUND(BYTE HD)} SCOR(5)==+HD SCLP() PRSCOR()RETURNPROC PL(BYTE PX,PY) PLX=PX PLY=PY SCR(PLX+Y40(PLY))=IC ;Access screen.RETURNPRO}C DR(BYTE DX,DY) DRX=DX DRY=DY ;Find out which is greater ; the plot or the drawto x position. IF PLX<>DRX THEN IF PLX>}DRX THEN S0=DRX S1=PLX ELSE S0=PLX S1=DRX FI IF IC=70 THEN SCR(S0+Y40(DRY))=67 SCR(S1+Y40(DRY))=68 S0==+}1 S1==-1 FI FOR S=S0 TO S1 DO SCR(S+Y40(DRY))=IC OD FI ;Find out the greater y position. IF PLY<>DRY THEN IF PL}Y>DRY THEN S0=DRY S1=PLY ELSE S0=PLY S1=DRY FI IF IC=73 THEN SCR(PLX+Y40(S0))=72 SCR(PLX+Y40(S1))=71 TS0}=SCR(DRX+1+Y40(S0)) TS2=SCR(DRX-1+Y40(S0)) ;Check for intersecting line and ;add corners when needed. IF TS0=70 T}HEN SCR(DRX+Y40(S0))=81 FI IF TS2=70 THEN SCR(DRX+Y40(S0))=80 FI TS1=SCR(DRX+1+Y40(S1)) TS2=SCR(DRX-1+}Y40(S1)) IF TS1=70 THEN SCR(DRX+Y40(S1))=78 FI IF TS2=70 THEN SCR(DRX+Y40(S1))=79 FI S0==+1 S1==-1 F}I FOR S=S0 TO S1 DO SCR(DRX+Y40(S))=IC ;Plot character OD ;on screen. FI ;Save drawto's values in pl}x and ; ply variable for next drawto. PLX=DRX PLY=DRYRETURNPROC PMST(CARD PMADR,SHADR,D) PARY=PMADR TM=T3M(D) SHAD=SHA}DR DI=T8M(TM) ;Check to see if Player is player or ;misslie shapes. IF PMADR>M0 THEN PMNO=((PMADR-PMTEMP-1024)) RSH 8 }ELSE PMNO=4 FIRETURNPROC PM_GO(BYTE PMX,PMY,FR) IF PMNO<4 THEN HPOSP(PMNO)=PMX ELSEIF PMNO=4 THEN HPOSP(PMNO)=PMX}+6 HPOSP(PMNO+1)=PMX+4 HPOSP(PMNO+2)=PMX+2 HPOSP(PMNO+3)=PMX FI SH=SHAD+((T8M(FR))+DI) FOR TALL=0 TO SP DO PARY((P}MY-SP)+TALL)=0 PARY((PMY+7)+TALL)=0 OD FOR TALL=0 TO 7 DO PARY(PMY+TALL)=SH(TALL) ODRETURNPROC VARSET(BYTE VN) OS}X(VN)=STX(VN) ;Make old X&Y pos. OSY(VN)=STY(VN) ;= new X&Y pos. ODR(VN)=DIR(VN) ;old direction = new CSX(VN)=STX(VN)-}48 ;Make P/M x&y = CSY(VN)=STY(VN)-32 ;that of screen. SAX(VN)=CSX(VN)&3 ;Checks for even SAY(VN)=CSY(VN)&7 ;char. pos. C}DX(VN)=CSX(VN)/4 ;Divide to find CDY(VN)=CSY(VN)/8 ;char. we're over.RETURN PROC LOOK() BYTE K0,K1,KP IF STX(4)>52 AND  }STX(4)<192 THEN DCD=SCR(CDX(4)+Y40(CDY(4))) DCD0=SCR(CDX(4)+1+Y40(CDY(4))) ;Check to see if char. is Gold. IF DCD=193!} THEN SCR(CDX(4)+Y40(CDY(4)))=0 SCR(CDX(4)+1+Y40(CDY(4)))=0 GG==+1 ;increase gold count. ST0=10 ;sound effects ti"}mer. SCORE(5) ;Add 5 points to score. FI IF DCD=86+INE THEN FOR LP0=0 TO 12 STEP 2 DO K0=ENER(LP0) K1=ENER(LP0+#}1) ;If it's a match then erase it. IF K0=CDX(4) AND K1=CDY(4) THEN IC=98 PL(CDX(4),CDY(4)) PL(CDX(4)+1$},CDY(4)) FI OD KP=LP0 HUND((INE RSH 1)+1) POWER=100 ;Set power timer. ST3=60 PT=60 PD=5 FOR LP0=0 TO 3 DO%} ECT(LP0)=80 OD FI IF DCD=96 THEN FOR LP0=0 TO 16 STEP 2 DO K0=KEYS(LP0) K1=KEYS(LP0+1) IF K0=CDX(4)&} AND K1=CDY(4) THEN IC=98 PL(CDX(4),CDY(4)) PL(CDX(4)+1,CDY(4)) KP=LP0 ;Make KP=LP0 so we can '} ;use it to index the ;door array. HUND(1) ;Add 1 hundred to score. ST2=20 FI OD ;Find out (}if it's a vertical or ;horizontal door and erase it. IF KP<4 THEN IC=98 PL(DOOR(KP),DOOR(KP+1)) PL(39-DOOR(KP),)}DOOR(KP+1)) ELSE IC=98 PL(DOOR(KP),DOOR(KP+1)) PL(DOOR(KP)+1,DOOR(KP+1)) PL(38-DOOR(KP),DOOR(KP+1)) PL(38-*}DOOR(KP)+1,DOOR(KP+1)) FI FI FI IF DCD=99 THEN IC=98 PL(CDX(4),CDY(4)) THOUS(THO) ;Add thousands to score. PL(CD+}X(4)+1,CDY(4)) ST2=30 FIRETURNPROC CHCH(BYTE CN);CN is the P/M number. BYTE BPAS,BPAS2 IF SAY(CN)=0 AND SAX(CN)=0 THEN,} ;Set all direction vars. to 0. DDU(CN)=0 DDD(CN)=0 DDL(CN)=0 DDR(CN)=0 DDM=0 EH(CN)=0 ;Checks Pl. up direction for-} walls. DCD=SCR(CDX(CN)+Y40(CDY(CN)-1)) DCD0=SCR(CDX(CN)+1+Y40(CDY(CN)-1)) IF DCD>66 AND DCD<86 OR DCD0>66 AND DCD0<8.}6 THEN DDU(CN)=1 FI DCD=SCR(CDX(CN)+Y40(CDY(CN)+1)) DCD0=SCR(CDX(CN)+1+Y40(CDY(CN)+1)) IF DCD>66 AND DCD<86 OR D/}CD0>66 AND DCD0<86 THEN DDD(CN)=1 FI DCD=SCR(CDX(CN)-1+Y40(CDY(CN))) IF DCD>66 AND DCD<86 THEN DDL(CN)=1 FI D0}CD=SCR(CDX(CN)+2+Y40(CDY(CN))) IF DCD>66 AND DCD<86 THEN DDR(CN)=1 FI IF CN=4 THEN DCD=SCR(CDX(4)+Y40(CDY(4))) D1}CD0=SCR(CDX(4)+1+Y40(CDY(4))) IF DCD>0 AND DCD0>0 THEN DDM=1 FI FI FI IF STX(CN)<30 THEN STX(CN)=220 FI IF 2}STX(CN)>220 THEN STX(CN)=30 FI IF STX(CN)<56 OR STX(CN)>192 THEN DDU(CN)=1 DDD(CN)=1 DDL(CN)=0 DDR(CN)=0 FI IF STY(3}CN)<48 OR STY(CN)>208 THEN DDL(CN)=1 DDR(CN)=1 FI IF DIR(CN)=0 AND DDU(CN)=1 THEN DIR(CN)=ODR(CN) EH(CN)=1 FI IF 4}DIR(CN)=1 AND DDD(CN)=1 THEN DIR(CN)=ODR(CN) EH(CN)=1 FI IF DIR(CN)=2 AND DDL(CN)=1 THEN DIR(CN)=ODR(CN) EH(CN)=1 5} FI IF DIR(CN)=3 AND DDR(CN)=1 THEN DIR(CN)=ODR(CN) EH(CN)=1 FI IF DIR(CN)=0 AND DDU(CN)=0 THEN STY(CN)==-SP FI6} IF DIR(CN)=1 AND DDD(CN)=0 THEN STY(CN)=STY(CN)+SP FI IF DIR(CN)=2 AND DDL(CN)=0 THEN STX(CN)=STX(CN)-SP FI IF7} DIR(CN)=3 AND DDR(CN)=0 THEN STX(CN)=STX(CN)+SP FIRETURNPROC EMBR(BYTE EN) BYTE R,D,FL,D0,D1 FL=0 D=ODR(EN) D0=OSY(8}EN) D1=OSX(EN) VARSET(EN) IF SAX(EN)=0 AND SAY(EN)=0 THEN IF POWER=0 AND STX(EN)>STX(4) AND STX(EN)STX(4)-48 THEN DIR(EN)=3 ELSEIF STY(EN)>STX(4) AND STY(EN)<:}STY(4)+56 THEN DIR(EN)=0 ELSEIF STY(EN)STY(4)-48 THEN DIR(EN)=1 ELSE R=RAND(4) DIR(EN)=R F;}I DO IF D=0 AND DIR(EN)=1 THEN FL=1 ELSEIF D=1 AND DIR(EN)=0 THEN FL=1 ELSEIF D=2 AND DIR(EN)=3 THEN FL=1<} ELSEIF D=3 AND DIR(EN)=2 THEN FL=1 ELSE FL=0 FI IF FL=1 THEN R=RAND(4) DIR(EN)=R FI UNTIL FL=0 =} OD IF STX(EN)=D1 AND STY(EN)=D0 THEN R=RAND(4) DIR(EN)=R FI FI CHCH(EN)RETURNINCLUDE "D1:MIDAS4"qACTION ! File-Handling›-----------------------›Editor commands :- This is the program that you boot-up into ---?} it is like a word processor.SHIFT+CTRL-R :-Reads source program into buffer from device:filename (ex. D1:MFWBSRC.ACT)@}SHIFT+CTRL-W :-Writes source program from buffer into device:filename (ex. D1:MFWBMOD.ACT)SHIFT+CTRL-M :-Enters MonitA}or, essential to do anything useful.SHIFT-CLR :-clears the buffer after confirmation.Monitor commands :-The monitoB}r display shows an inverse-video command line at the top of the screen.R "Dn:file":-Loads, compiles and runs directly frC}om the monitor (ex. R "D1:MFWB.ACT")C "Dn:filein":-Compiles from the file into the buffer. It is usually followed by theD} W command to write the compiled program to an output file.W "Dn:fileout" :-Writes out the compiled code as a Binary-LoaE}d file. (ex. "D1:MFWB.EXE")E Exit Monitor, and return to the Editor.D Returns to DOS, in order to run the Binary-Load fF}ile you have just compiled. Note:- before you use this command, put a disk in Drive 1 which has Atari DOS 2.0S with the fileG}s DOS.SYS and DUP.SYS as the first 2 files !. From DOS, you can then type L,MFWB.EXE to run the Binary file that you have cH}reated.Note:- You cannot return to the Editor from DOS. You must re-boot.(Penalty for having a Pirate copy).REMEMBER THI}AT ACTION! MUST BE IN RAM OR THE FILE WILL NOT WORK !!Note to hackers: Since you are presumably not using an Action J}Cartridge (ha ha...), you must ensure that Ramtop is set to, say, $6000 so as not to over-write the Action! run-time routiK}nes. You may do this by having as your first executable Action! statement:- Poke(106,96).`$5P TFTFFAFS6&&&&'@YUHUYU  B JKIHiDiELV`L=$M} =$ BLV` L$$l L$ &` Fj`8冨凪` $EӅӥN} $`ʆǪƩ Ɛee` $ƦʆǢ &Ɛeǐ % %L$ $'&&&8儨児O}祂*L$&&*ń8&&L$ [%`hihiHHȱȱL$c !#3`P}L$JJJJ`H $h`Hȩh r$L% {$L% %$L% -$L% 3$H8Q}`HhHh _&L% BHI V䅠L% L& =$L%Ԇ ؠPIPP`R} &P -$L% &L& &L& 'L&H- &8塪墨hL' 'L& &'L& &ȹP`S}텠8堨塪 &芨Oȩ-`PP &P棩 Ѥģ0-ģ6000:,80H T}& &ehe&eģ0ʥ 8堅塅`$ &&*i0:0i &Ʀ`¢ 护U}°ڱ%ȱ%E &L`(担CS R&L`(I 'L`(H (L`( &L`( &B V %NLMȑV}` MLN%B VL%S:)E:)H L& ) ) & L&h)0I))L&[\ZUVT` @)))W}` G)L& :)L& @)L&) ` G)L& &%` 0d $ҥ `2)2X}ҩ`p`0)9*`@0)ӈJJJJ)`Ѕ`ȱ`` 5*ȥ`HhY}ƣĢ`ƥĤ`Ѣ *`ȱѢĦ`膡`Z}`ťƤe8夰L* Ƥ8`ŦeѠe桊L*,)7+[}l+ POKEC(LINE+1,DABCDEFGHIJKLMNOg+L|+@ 5*@ѩ 5*`L+ ) y+0 %*ii %*\}V+U+8U+@W+V+X+8W+鐍_+X+`+8_+鐍a+`+b+8a+,Y+b+Z+8Y+,[+Z+\+8[+(]+\+^+]}͂L, ma+*(mb+i(iLN,8]+x^+))) ^}) )0NN)JJJJJJ   Y+mZ+iL:-L=-L, %*_} %* %* %*`Lq-`͔L-L-L-Ly-`L- ) y+͂L- m`}_+*(m`+ ma+*(mb+L-p 5*iip 5*iip 5*iia}̀L.N 5*ii m_+*(m`+ ?*iiLE.0 ?*b}ԩ ?*X ?*A 5*ii ?*`L/R+Р 5* 5* 5*J+ J+L\/K+Rc}+ ԭR+R+ )L:/J+L*/8K+K+ %*Lx/L{/L%/`L/R+Р 5* 5* 5*J+ J+L/K+Rd}+ ԭR+R+ )L/J+L/8K+K+ %*L/L/L/`L/R+Р 5* 5* 5*J+ J+LV0K+Re}+ ԭR+R+ )L40J+L$08K+K+ %*Lr0Lu0L0`Ly0R+Р 5* 5* 5*J+ J+L0K+Rf}+ ԭR+R+ )L0J+L08K+K+ %*L0L0L0`L0iìLd1ii m_g}+*(m`+ ?*iiL 1`Lh1 e+f+L1f+e+`͂L1 m_+*(m`+ mq}(B'DOS SYSB*+DUP SYSBaUMIDAS EXEB<MIDAS4 BLMIDAS3 B>ACTION DOCB[LBENDER COMB>WINSTON MICB>MAGICIANMICB>,LADY MICB>jGRIFFIN MICa+*(mb+L1͔L2U+mV+mW+mX+mL2L2зL1 0`L&2r} e+f+L>2f+e+` 5* 5* 5* 5*d͂L2< )ei͔L2Ls}2U+mV+mW+mX+m- ҅U+mV+mL2L2L}2Lk2 e1`L3̓L3i't}i͂L3U+mV+mU+mV+mU+mV+mY+mZ+iU+mV+mu}Y+mZ+i8L/3iiL3`L3_͂L4 m_+*(m`+v} m_+*(m`+8 m_+*(m`+ȱ8 m_+*(m`+ȑL3 0`L4T+(T+L]5w}_͂LT5 m_+*(m`+8 m_+*(m`+ȑ8 m_+*(m`+ȱx}8 m_+*(m`+ȑL4 0T+L4 n-T+(T+L56_͂L,6 m_+*(m`+y} m_+*(m`+ȑ8 m_+*(m`+ȱ88 m_+z}*(m`+ȑLt5 0T+Le5 n-T+(T+L69/͂L7 m_+*(m`+8 {}m_+*(m`+ȑ8 m_+*(m`+ȱ8 m_+*(m`+ȑLL6|}/͂L7 m_+*(m`+ m_+*(m`+ȑ8 m_+*(m`+ȱ8}}8 m_+*(m`+ȑL 7/͂Lp8 m_+*(m`+8~} m_+*(m`+ȑ m_+*(m`+ȱ m_+*(m`+ȑL7/͂L-9} m_+*(m`+ m_+*(m`+ȑ0m m_+*(m`+ȱ8}0m m_+*(m`+ȑLu8 0T+L=6 n-T+(T+L7</͂L: m_+*(m`+} m_+*(m`+ȑ8 m_+*(m`+ȱ88 m_+*(m`+}LM9/͂L: m_+*(m`+8 m_+*(m`+ȑ8 m}_+*(m`+ȱ8 m_+*(m`+ȑL :/͂Lq; m_+*(m`+} m_+*(m`+ȑ m_+*(m`+ȱ8 m_+*(m`+ȑ}L:/͂L.< m_+*(m`+8 m_+*(m`+ȑ0m m_+*(m`+}ȱ0m m_+*(m`+ȑLv; 0T+L>9`L;<̓L<͂L<U+m}V+mU+mV+miiU+eV+eiiU+eV+eLU<i}iLF<`L<_͂LR= m_+*(m`+ &% m_+*(m`+L<_͂L=}i` m_+*(m`+ m_+*(m`+LW= 0`L=8 m_+*(m`+} m_+*(m`+8 m_+*(m`+ȱ8 m_+*(m`+ȑ8LQ>La>̀L^>L}a>L= 0ILq>L>L~>L>L=`L> m_+*(m`+ m_+*(m`+i m_+}*(m`+ȱi m_+*(m`+ȑ8̀L'?L*?L> 0IL=?LM?LJ?LM?L>`LQ?}_͂LUA m_+*(m`+^̀L"@ m_+*(m`+ m_+*(m`+8 }m_+*(m`+ȱ8 m_+*(m`+ȑ8L? m_+*(m`+ m_+*(}m`+_+`+ȱ_+`+ȑ^̀LA m_+*(m`+ m_+*(m`+i} m_+*(m`+ȱi m_+*(m`+ȑiL@ m_+*(m`+ 0L}OALUALV?`LYAf+e+ - L&^+]+ & e+f+LAf+e+`/ 5*͔LA &W+m}X+mLAf+de+ L&`дLA & & & & L&dL+"/ 5* #2`L9Bf+e+ )} y+ 5* 5* 5*LfBBe ?&LqBBp ?&L|BB{ ?&LBInsert picture disk into DRIVE1B ?&LBB ?&LBand p}ress when ready.B ?&LBB ?&LBB ?&Щ %*ILCL CLB 5* L&L#CD:*.?ICC &^+]+ z}&^+]+ ?&]+i^+iI LeCLhCL4C L&LqCCp ?&LCEnter D:FILENAME.EXT C{ ?&LCOR press to exit.C ?}&LC?C R&^+]+ s& L&^+]+ & L&`LC :)LD>C R& :)8͂LEL1DSTEP D+ R&} &LSD IS OPTION.......DA R&[+m\+i@ѮLD[+m\+iPLDͅLD[+m\+i8@T+w}+mT+x+i &LD D R&[+m\+iLELDEND D R&LEE ?&LD8`L#E ) 5* }y+ 5* 5* 5* 5* 5* L&LlEK:Ei &LEE ?&LEE ?&LETo load & manipulate aE} ?&LEpicture file, press 'P'E ?&LEE ?&LETo manipulate a loadedE ?&LFpicture file, press 'L'F ?&@ 5}* &ILLzFIPLbF[+\+ 6BLwF]+i^+iLF[+\+]+i^+iIDLF[+}\+MIPLFIMLFILLF[+\+M` e+f+LF` ) 5* y+ 5* 5* 5*L5GA = }Restore DisplayG! ?&LRGB = Invert DisplayG? ?&LoGC = Mirror DisplayG\ ?&LGD = Shift DisplayGy ?&LGE = Double Di}splayG ?&LGF = Fold DisplayG ?&LGG = Unfold DisplayG ?&LGH = Roll Display 50%G ?&LHI = Wait 2 SecondsH } ?&LEHJ,K,L,M Scroll Color RegistersH& ?&LbHN = Scroll DisplayHO ?&LHO = REPEAT FROM STEP 1Hl ?&LH- = Back 1 Inst}ructionH ?&LH+ = Skip To Next InstructionH ?&LH* = Delete This InstructionH ?&LI= = Begin ExecutionH ?& L}&L!IK:I & C :)LXICHOOSE AN OPTION:IF R& & &I-LIͅLI8I+LI}LI@̀L*JPL*J[+m\+i8[+e\+i8MLJ[+m\+iL}JLIͅL*JI*LzJ[+m\+ii[+e\+iILwJLzJL:JI=LJLJL7I L&} ) y+ 5*LJJ ?& 5* 5* 5*LJJ ?&LJJ ?&LJJ ?&L KTo stop viewing a picture holdJ }?&L4K down the key while you areK ?&LRKviewing the pictureK> ?&L]KK\ ?&LhKKg ?&LsKKr ?&LKPress n}ow to begin.K} ?&ILKLKLK`LK +͂LK[+m\+iLK E[+\+ILL.L[+\+}IPL+L VA e+f+L+Lf+e+`LfL L+LfL - 5* 5* 5* 5* e1 e+f+LLf+e+`}[+m\+iIOLLȌ[+m\+iIALL e1[+m\+iIBLL 3[+m\+iICLL 3[+m}\+iIDLM 8<[+m\+iIEL8M <[+m\+iIFLVM >[+m\+iIGLtM =[+m\}+iIHLM N?[+m\+iIILM n-[+m\+iIJLM .[+m\+iIKLM |/[+m\+i}ILL N /[+m\+iIML(N v0[+m\+iINLFN 4[+m\+iLbNL~NLoNL~NM }5*LkL`LNf+de+`LNJ+J+LOЩ %*ILN`K+mN+K+M+mN+M+K+Q+ ԭQ+Q+mP+Q+ )@LNM+Q+} ԭQ+8Q+P+Q+ )LNJ+LNLN`L#O$d+$c+N$N$N+P+Q+ЩlM+K+ ) y+/ 5* 5*} 5* :)LO StockSoft'sO ?& :)LOPICTURE BENDERO ?& :)LO(c) 1986 StockSoft (UK)O ?& :)LO} PRESS ԢO ?& :)LP TO CONTINUEP ?&/ 5* N KL;O`` OL}U@QUwwuPU EE@U]]@UDTD@****}** **UWwwwwuPꪀTUTUU}]TEUTD@ " " "*UQUUUWwwUwwTQQ }EUUUU]]DEU@@"** *(TUUWwwwUUWUU}*DDUUTUU]@TUUT@" "***}UTUUuwwUUUUQ  *EEUU\UUU]@UTDUD}*" + :*UTWWwwwwUUUU@UP舀ꪪ}@EEEUUU]]@]DTUT@* ""*:UUPUUwwuuUUPuQ@ }>DUEU@U]_U]T]EUUDD" ***?U}@UWWwWUUTUPꨀ?ꪪ@DEUU@EU_UTUTUT"}?UU@UwwuuUPUQP ?ꪪ@EUUUEU_}U@UUDD?UUWWwUUUuUQ}?ꪪ@EUUUDU]PUUTDPUUUUUWwwUT}Q*ꪪDUU]EU]]TUTED*}*UAUWwwUPUQꈀ ꪪUUUU]U]]P}UUT@} " :UUUUWuuu@UUUU}UUUE]@UUDUUUTD*+Uu@UWwwUTTUUP}ꪪTUUUU@T@UU@D ""** /QUUuPWw}wwwuUQUUUꪪUEUU]PU]D]U]U"**/}:UUUWuw}UwUUUWUUU@UUUU_TPU_]}UTU]UP@**UUUUUUUUwwwuwwuWutUWUUU}TUUUU]UEUU]U]UTU]]UE"**"*UUUUUUUUUWu@WUWUQwUU}DUUUUU_T}DEU]_D+" }UUUUUU_WWUPUPUUUPWwU讨 UUU]]U]UTUPTEEE_T*}*+UUUUUUPWwUUUWTUUWwwUQꪪTUEUUU}U\@@U_UU_T@*PUUuuUwU@WuuUUUWUUQP}ED@EUUU]@]UU_UUUT* UUUwUUwu@}UUWuWuUUUT>ꪊ@DTTUUUUE_UUUUUUT }UUUwUu@wUUWwuUUUU ꖪEDEEUUU__]U__}TUUU *UUUUw@WwwwUUWuUUUU訿}@DTEUUUPU]U]UUUU:*+;QUUUUUw@WwUwUUwuUUUU0}>EUUUUU_U_UUU]UUU+U}UUUWw@Ww@WwUwwuUUQUUUUUUDTUUUUU]_UUUUUUUUUp}/QUUUUUWwpwwwwwwwuwUUuEUUUUUUSDEUU]U]]]]}_]UUUUUUU0UUUUUW_WUWwwwWUWUUQUUUU@0}DDUU_]PUUEUUT+UUuUUWwWwwwuU}wUUUU jDEUU]U]U_]TUUW}ꪪUUUQWW|wAWwUuUuQ 𪪪 ꪪDUUU]UUU_UUUTU}UP+ *UUUwUQUpUPUwwUU*/}DEUUU_UUPU|UTUU +?UWwUPP}WuUQUU }ﺺDDTUUU@EE]PU  *+ UwwuW}PwuUPUU\ ?着D@U]P_]U@ *+}??>ZWwP_UPꪾ DU]TT]}P@*>UUwwwPTq }8 DD@UU]T@P*UwTwUUp} ꊨ"TT@UUU@TD@_A/"**}*QUU@pwwu/DDEU_@]W]D}/**UUw@@UTwWU/ꪪTT@U}@T +(:UUpwwqUP@} DE@UU@UUT@@@""*}WU@@TE@TTU;}"QPUwEEUE@]]_@} 8UWwup}UTUTU@+ UPUQP@} UEUP@*/}@ETU@P|}"*ET}*?T}DUTP}wDUP}@|5;UPUUUUPTUUUPUUTP UPTUEUTU@UUAUUTP!} U@UTUUU@PUPUUT@ PU@U!}UUPU@QP@UUP EEUDUUUATUPUUPUU@U(* !} UUTUTUUTUTUUP@( *uUUU_TPTWu@!}@UUTUUPUU( ** *(UUUUU_UUPUPPWUAPUUU@  ** !}*UUUUU_P@UQPQU_UT@UUUU@***** UUUUU_PU@WUP!}U@UU@*** QUuU]P@}@WU@UUPUEP(*!}WUUUUUAPuUPUTPU@*(WUuPTTUU}UP@UTET!} ** _UUTPT]uUTUU@UPPUUTP+** ( U!}TPUUUUP@_TQUUUU+(( WTUUuTPTUUAUT+/!} ?Q_}UUTUUUPTUU@UUP++(?Q}_U}!}UuTQEUPU@UEP/*"(QUW@U}UPAE_@U@@+( *!}(QU_}@U@AUP@@T@P  *UUE@P@@T!}P@P  *WUUWP@T@PT_@P   !}**WUUUUUU@TU_P ꀠ *_UuA_UP@UPU!}@ ***(UW_PUU@?P@TPW}TU@* *( !}@PUUPUPUW@U@  @T@UPUUUU_U@UUTUU!} ꪪ TUWU@TUUT * * T"}4U}U]@UUTU / T__U]@UUPP "}+TWUU_UUU@PUP ꪿+ @}PU"}_UUU@P@UTuWU_UUUUP "}*_UUUUU@ _WUUU"} @@}_UUU"} A@A@@w_UUU@UP@_WUUU"}@UTTU@UUUUUP P"}UUUUUUU@P@ ꪪPUUU_UUUUP"} UUUPW_UU@@E * * UUUT" }_U_UUPU@ **UuUT_UUTUU *" }* @5U_UQ_UUUT (*ꪢ P5U_UQWUUUU_U" }UUUUWTT***ꪀU@UWUAWUUUU_}UUUUWPP **" }  UW_UUU__UUUU]PU@ (*UUTWuWUUWUuUU" }꿪 UWPU_UUUUUP "}UTU_UUUUUUP +ꪂuPUPW__}UUUUP*"}* **5TUUU__W_uUUU@* + UUU"}U_U__UUUUU  ꪪQUUUWUUUUUUT *"}ꮿTUUWUUUUU@UP * ꪯ⪪* TUW"}_UUUUET *(U]U__WPUU@ "} (@UW_UAUUU*UUU_"}Q}UU*ꪀ*UU}WWU_U  "}___A_UU * _U_UU_UUP"} W@}UP 꺪"}W_UUWuP ***UUWUU_P *"}+UUU___P  UW_"}_PU_P"}W_P +ꪪꪪ_"}_P /ꪪUU_P "}ꪪW___@*U_"}]U+誀UU?WUꂢ("}UUUWU_UT  UUUQWW_UUT*"}+UTWUT __" }UWUT +絛UU]uUUU*"!}(UUUUUUUUP(ꯪ UUUUU""}UUP* ꪪ*UUUUUUW_UP** +"#}WUUWUU__WW@P (+UPUWUU"$}U_UTWUUUUP "몀"%}@_UUWUU  ꪀ_UWWWUUUUUu"&} * *ꪀ*PU_UWWUTUUUUP  *ꪀ P"'}A__U__UWE_UP *++*ꪨ @_UU_UU_UWP*"(}//ꪨ_UUUUU_AUP*/꪿_UU")}UUUUUU_ ꪪ _UU]WUUTUUUP***"*}*_UUUU_UWUA__P*ꂊ _uWUuWUUUUT"+}UU}UP*ꢠ*ū ;DEUUUUDDDU_@UUT""&-}UQQwWUPUUUD@_UUp "*&.}"*UwwUWwuUȀDUUT@&/}DTDUW """"WuuUUwT &0}UUT@]]*"""""""""+Ww&1}wwUUUwwuUT@TTUUT@UTUT*" "&2}PUQWwwwWUUww@DDDEUUU@]]_U&3}""""*UUUPUwwwwwUWWꪀ&4}TTDDUUUT@U]]"""PUUUUwwwuUUU &5}>E@DEUUU@]U]]"**(+*&6}UUWPAUuUWuTUWwUU@DDDUUTEUUU] *&7}"UWwUWUWwtUWwu UDETDEUUDE&8}EUU] *APUUwuQUWUWwTW_uUȊꪪ꯯舊&9}TUETD@DUUUUWU]U]* ""U|WQPUUwUQ_@UUUUuwu&:}UwȊꪪ舊 UUEDEUUET@U]U]U_ *&;}AUWQUuUUWWUUWꪪ }WWU@@@DEUUDUUUUUUTU&<}*"WUwPUWUUUUUUWTꪪꪪ&=}DDEUU_@EU]_UUDTU_UW⪪**UwuQUWQUW_ȿ&>}}DDDDDUUWTU U}qUw&?}uUWWw}DDDDEUU_]>&@}*tUWwwwwWWwUU着P@uDDDUUU&A}UU_ *WQUUWwwwwuuwPUw&B}WUDEEDUUU]PU>ﺪ7UWwwuUUPW&C}ȯ耀wDUUUUUUU«&D}_QQQUUWwwPWꪏ uDEUEUUU]TTU]&E}WpUUWWwQWꪪꪪ]ADUUUU&F}UUUTEUU*W]UUQUUwwUWwUUP@U&G}UwG|DUUUUUUU]UUTU**UUUWwUU&H}wUUUPUUuꪯ DUUUUUUUUUDPU"&I}"_]wUUUUUUwwuUUwuUU _UUUUUU]]UUUU@&J}U"+UUUUUUwwWwUUUUuUU]W&K}UUUUUUUUUU_UUD""*UUUUUUuwWUUUUP&L}WuUUUUUU]UUUUT" **&M}UUUUUUwwUUUQUu*ꨈDUUUUUETUUT@"""&N}* UUUUUUuwUPUUUU]U]ꪊ UUUUU]&O}T@UUUDU՝u*""UUUUWWUPUUUUUW&P} D@UUUUPUUUT@*"  UUUUWwwwwwPUU&Q}UȪ UuDUUUU]TUUUT ª**&R}UUUUUUUUUWwwuPUUU ʪꈀDTUUUUUUTUUUT@&S} WW_ꪪ"** UUUUUUUUUUUPꪪ&T}UDEUUU]U@U@UUUDuuꪪ *"UUUWUUPwU@UUUꪪ&U}芮ꪨE5_UTUUU]@UUUT@ꪪ"""/"QUUU&V}uUwUPUUU?ꪪꪯ?UDEUU]@TUUUU@jꪪ""&W}""UUUWWwuPUTUUꪪꪨꪪꪨTDEUU&X}UEUUUDꪪ"""UUUUUwwuUQUQ&Y}?UDUUU@DEUUTꪪ"** *UUUwwwuUPQ&Z}ꪨꪪUDUU]UTUTTD "" *&[}UUUuuuuUPꪪ UDEUU]TDETD&\}ꪪ""""QUUUUUUUꪪUD&]}UU]@TD@ꪪ """"QUWwUꪪ&^} UDUU_DDꪪ "*"QUWwu&_}QꪪTD@UU@D@ꪪ """ "&`} QUWwuPUDUUTD&a}몪"""**"UUWwUꪪ&b}UD@UU@@@ꪪ"""" QUUwUP&c}ꪪUDUUUTD""""*"&d}UUWUUUꪪꪪUT@UUUUTD@&e}""" UUUuUUUUꪪꪪ UD&f}UUUUUUUD""""*"UUUUUQꪪ&g}ꪪUD@UUUUUUT""" #UUUUQ&h}ꪪꪪUDEUUUD@ꪪ""""""**"&i}5$;@UwwUwwUwu@]]]]@uwUwwuwwP@*k}PP@WuwWwwWwuPPPUU@UPTT*l}WwwWwwWwUw@T]]]@utwWuWwuwuuWu@T*m}]]]w@twwWwwWwUwwu@T@U]]]Uw@u*n}PuWuwuwUWwwPP]]]]]PwPUtwWwWwWuwwwuP]*o}]UU]@wtPuWwUwWuWwuwuW@]]]@WuTuwwWuwWW*p}wUUWuU]]uuWtuwwwWwWWwwwwP]]]]]]@*q}PwwWtWwwwWWuwuwwuP]]]@wWWuWwWwwWuwWwWT*r}]]U]]]PUUWwu@wWuwuWwWwwuu@t]@]]UU]wuuw@*s}wWWWwwwWuwUUWwP]]@U]]@WwUw@wWwWwwUWuwWwww@]@*t}]]]U@wWWPwwwWwuuwwuWwwuP]]]wwWTF@*u}WwwwUuWuwwWWwwT]f]]]U]]PWuuuiwwwwwwwUuUwwww@]]j@*v}]U]@wwuwwwuwwwWUwuwwu]]@UU]TwWW@j@WwuUWw*w}wuwwwuwu@]@]U]Wwu@wwwUwwwuwwwWuPUUPd]*x}]wUw@dwwwwuwwWwwuuP]Pjd]UWuwTZdWwWwwUwwwwwuuTU*y}]PVP]]UU]TwwwTjPwwuwUwuWwwuwwwwT]U_]U]P*z}wWwuwwwwuwwuWwuWwwwu@}]@]]]UwwwuF_wwwwwWwwwUwwwwwT]*{}V_]@uwuZwwwwwuwwUwwwwwU]ݪ]]PwWwj*|}wwuuwwWuwwwwwu@]]ڪ]]UwWwv_UwwwwWWwwwwwwUUP]]֪3*}}]]UPUWWZtGwwwwWwwuUwu]j]3A]PwWwjL@@wwww*~}UuWWuwUT]js]]]UUWwuVwwwWUWuwwuWuZU*}uwvWwwwuWuUuWwWU]ڪ4]]]UUPwwZ_DwwwwwwWWwWwU*}]]Ҫ%P]]]]TwWXwwwwwWwuwuuUP]ҪU]U]U]@P*}UWXwwwwwUWwuwwWwEPҪ%U]UPWwXwWwwwWwuwwwwwT*}]Ҫ%]]]]]TwuHwwwwWWWuUwwUU]"%]]U]PUAT*}uwwWWWUUuuUUwPDTD"*%]]]U]]UDtwUWWuwuUwwWwtDEE"**}!UUQTIwwwWUwwwwwWwtTDUA"*]U]]U@Tw*}WUuWuwuWUWwPDDDD@"* ]]]]UU]UAQ@TwWWwwwUwWwPDDDDP"*%]]*}U@UHwWwwwwWwUU@UAUDDE*&]]]@UPUXwuwWwWWwP*}TDDE@Rb&U]UTU@TJtUWwWWuUUU@PDDG@}bvU]]]]UT@Q*}_PHtWWUWWwuw_@@TҪvUUU]~T@تTWwwwuwuU{*}*_U]@_uwuwwuP**}wuUwUU"]]]@}UuwWUU@}*}]]]}_wwww}@_]]_@*}jgUWUUW@֪g]@V_u_@*}]@u_@U^}@W{*}}??W~}]|߻}@}??*}@}|@}??@}|@*}}3?_P}LO_}s3?33_*}Ls7333?3L_*}s5333?1WLs1333W3?3357@*}L\TP@s3s53335S5}LT}33*}5s5355s35_TTT334_W1Us335@_*}LU33tPs334_PDL@33Ts*}334WTPL33T@s335UPD@L*}3D@S331@@t@@3W@u@331Q3P*}U@T@O3@3335sLL*}U3DS333S?ML@3s@3333*}MP]@LU1qPq@s33s?1P]Q@\\*}S1Q@337Q33ULPP@]\P1@4P337Q?3*}T]5SP7Qs35\PMPU\@S4s@*}uU535@LM@UT@@s1QS7@s3@*}AP@L@34A@S7@S3PT@L@s3@s*}5@3@L34S@33\LL@*}ssQ4343s4LAL1qAt315S1*}E\\@5qqSq3P1\TMM]@*}S@qqS353@\@EQML@S@tA5s1Q3@@*}DL@ @TT4s11@hDL @`*}ts4 1\( 4 1P**}\ @(1Rs1@ @@*}3533@@@@333P@L*}P@U@335(;